home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Night Owl 6
/
Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso
/
016a
/
gofer221.zip
/
ERRORS.H
< prev
next >
Wrap
C/C++ Source or Header
|
1991-11-20
|
1KB
|
34 lines
/* --------------------------------------------------------------------------
* errors.h: Copyright (c) Mark P Jones 1991. All rights reserved.
* See goferite.h for details and conditions of use etc...
* Gofer version 2.21 November 1991
*
* Last updated 07/11/91 mpj
*
* Error handling support functions
* ------------------------------------------------------------------------*/
#define errorStream stdout
#define ERROR(l) errHead(l);fprintf(errorStream,
#define EEND ); errFail()
#define ETHEN );
#define ERRTEXT fprintf(errorStream,
#define ERREXPR(e) printExp(errorStream,e)
#define ERRTYPE(e) printType(errorStream,e)
#define ERRCONTEXT(qs) printContext(errorStream,qs)
#define ERRPRED(pi) printPred(errorStream,pi)
extern Void errHead Args((Int)); /* in main.c */
extern Void errFail Args((Void));
extern Void errAbort Args((Void));
extern Int breakHandler Args((Void));
extern Bool breakOn Args((Bool)); /* in machdep.c */
extern Void printExp Args((FILE *,Cell)); /* in output.c */
extern Void printType Args((FILE *,Cell));
extern Void printContext Args((FILE *,List));
extern Void printPred Args((FILE *,Cell));
/*-------------------------------------------------------------------------*/